home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Present…nuary (Partner) - Disc 2 / The Apple Reference and Presentations Library (Disc 2)(January 1994).iso / SAS Institute / US English / JMP Statistical / JMP-PPC / SAMPLE DATA demo / AppleScript Demos / AppleScript Demo Text (short) < prev   
Encoding:
Text File  |  1994-03-16  |  3.6 KB  |  92 lines  |  [TEXT/ToyS]
  1. tell application "JMP Demo"
  2.     demo "Begin short test of JMP" wait 1
  3.     set window position to {50, 50}
  4.     
  5.     open table ":SAMPLE DATA demo:BIG CLASS (general)"
  6.     set name of last table to "class"
  7.     set labeled of column "Name" of table "class" to true
  8.     
  9.     --Distribution of Y--
  10.     analyze distribution for {"Sex", "Age", "Height", "Weight"} from table "class"
  11.     set zoomed of distribution 1 to true
  12.     analyze distribution 1 without text report, outlier box plot and mosaic plot
  13.     analyze distribution 1 with normal curve
  14.     set scroll of distribution 1 to {0, 0}
  15.     set zoomed of distribution 1 to true
  16.     set position of last distribution to {30, 260}
  17.     
  18.     --Fit Y by X, continuous by continuous--
  19.     analyze fit for "Height" by "Weight" from table "class"
  20.     set zoomed of last fit to true
  21.     set position of last fit to {400, 40}
  22.     
  23.     set selected of rows of table "class" whose column "Sex" is "F" to true
  24.     set marker of rows of table "class" whose column "Sex" is "F" to xMark
  25.     set selected of rows of table "class" whose column "Sex" is "F" to false
  26.     
  27.     set selected of rows of table "class" whose column "Sex" is "M" to true
  28.     set marker of rows of table "class" whose column "Sex" is "M" to plusMark
  29.     set selected of rows of table "class" whose column "Sex" is "M" to false
  30.     
  31.     set color of rows of table "class" whose column "Age" < 13 to blue
  32.     set color of rows of table "class" whose column "Age" = 13 to green
  33.     set color of rows of table "class" whose column "Age" > 13 to red
  34.     set selected of rows of table "class" whose column "Age" < 13 to true
  35.     set selected of rows of table "class" whose column "Age" = 13 to true
  36.     set selected of rows of table "class" whose column "Age" > 13 to true
  37.     
  38.     set selected of every row of table "class" to false
  39.     
  40.     
  41.     analyze fit 1 with line fit
  42.     analyze fit 1 poly fit 4
  43.     analyze fit 1 spline fit 10
  44.     analyze fit 1 density ellipse 0.5 with reveal
  45.     set revealed of report "Smoothing Spline Fit, lambda=10" of fit 1 to true
  46.     set revealed of report "Bivariate" of fit 1 to true
  47.     repeat with i from 30 to 700 by 40
  48.         set scroll of fit 1 to {0, i}
  49.     end repeat
  50.     close fit 1 saving no
  51.     
  52.     summarize table "class" by {"Age", "Sex"} mean {"Height", "Weight"}
  53.     set name of last table to "classChart"
  54.     graph chart for "Mean(Height)" by {"Sex", "Age"} from table "classChart"
  55.     graph chart 1 orientation horizontal
  56.     graph chart 1 orientation vertical
  57.     graph chart 1 orientation pie
  58.     graph chart 1 orientation vertical type {needle}
  59.     graph chart 1 type {line}
  60.     graph chart 1 type {bar}
  61.     graph chart 1 with stack
  62.     graph chart 1 without stack
  63.     graph chart 1 with pattern
  64.     graph chart 1 without pattern
  65.     close chart 1 saving no
  66.     close table "classChart" saving no
  67.     
  68.     graph spinning plot for {"Age", "Height", "Weight"} from table "class"
  69.     graph last spinning plot rotate {3, 0, 0, 100}
  70.     set color of rows of table "class" whose column "Age" > 13 to yellow
  71.     graph last spinning plot rotate {0, 3, 0, 100}
  72.     set color of rows of table "class" whose column "Age" < 13 to cyan
  73.     graph last spinning plot rotate {0, 0, 3, 100}
  74.     graph last spinning plot rotate {6, 5, 3, 100}
  75.     graph last spinning plot rotate {12, 6, 0, 100}
  76.     graph last spinning plot rotate {2, 3, 0, 100}
  77.     graph last spinning plot rotate {2, 3, 0, 100} with box
  78.     graph last spinning plot without box
  79.     repeat with i from 1 to 4
  80.         graph last spinning plot rotate {0, 5, 0, 20}
  81.         graph last spinning plot rotate {0, -5, 0, 20}
  82.     end repeat
  83.     repeat with i from 1 to 4
  84.         graph last spinning plot rotate {5, 0, 0, 20}
  85.         graph last spinning plot rotate {-5, 0, 0, 20}
  86.     end repeat
  87.     close last spinning plot saving no
  88.     
  89.     close last distribution
  90.     close table "class" saving no
  91.     demo "End of Test."
  92. end tell